home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2007 March
/
PCWorld_2007-03_cd.bin
/
domacnost a kancelar
/
scribus
/
scribus-1.3.3.7-win32-install.exe
/
share
/
samples
/
Calender.py
< prev
next >
Wrap
Text File
|
2005-06-08
|
2KB
|
76 lines
#!/usr/bin/env python
# -*- coding: utf-8 -*-
""" This Script creates a Calendar Sheet for the Current Month """
import sys
try:
from scribus import *
except ImportError:
print "This script only runs from within Scribus."
sys.exit(1)
import calendar
import time
def main():
Month = time.localtime()[1]
Year = time.localtime()[0]
Objects = []
MonthList = ["January","February","March","April","May","June","July","August","September","October","November","December"]
DaysList = ["Mon","Tue","Wed","Thu","Fri","Sat","Sun"]
Xcoor = 10
Ycoor = 30
DayC = 0
Calend = calendar.monthcalendar(Year, Month)
ob = createText(10, 10, 245, 20)
Title = MonthList[Month-1] + " " + str(Year)
setText(Title, ob)
Objects.append(ob)
for lx in range(45, 245, 35):
ob = createLine(lx, 30, lx, 20*len(Calend)+50)
Objects.append(ob)
for ly in range(50, 20*len(Calend)+50, 20):
ob = createLine(10, ly, 255, ly)
Objects.append(ob)
ob = createRect(10, 30, 245, 20*len(Calend)+20)
setFillColor("None", ob)
Objects.append(ob)
for day in range(7):
ob = createText(Xcoor, Ycoor, 35, 20)
setTextAlignment(ALIGN_CENTERED, ob)
setFontSize(12, ob)
if day == 6:
setTextColor("Red", ob)
setText(DaysList[day], ob)
Objects.append(ob)
Xcoor = Xcoor + 35
Ycoor = Ycoor + 20
for lines in Calend:
Xcoor = 10
DayC = 0
for rows in lines:
if rows != 0:
ob = createText(Xcoor, Ycoor, 35, 20)
setTextAlignment(ALIGN_CENTERED, ob)
if DayC == 6:
setTextColor("Red", ob)
setText(str(rows), ob)
Objects.append(ob)
Xcoor = Xcoor + 35
DayC = DayC + 1
Ycoor = Ycoor + 20
groupObjects(Objects)
if __name__ == '__main__':
if haveDoc():
try:
setRedraw(False)
main()
finally:
setRedraw(True)
redrawAll()
else:
messageBox("Calendar Script", "Please run this script with a document open.", ICON_INFORMATION);